From 77586e62b6d306bae07e4e3e093ba488724f4131 Mon Sep 17 00:00:00 2001 From: Justin Burkett Date: Fri, 17 May 2019 21:57:18 -0400 Subject: [PATCH] Add which-key-dump-bindings Fixes #209 --- which-key.el | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/which-key.el b/which-key.el index 6980b78c5b9..f4b15c4806a 100644 --- a/which-key.el +++ b/which-key.el @@ -2278,6 +2278,21 @@ current evil state. " "Major-mode bindings") (message "which-key: No map named %s" map-sym)))) +;;;###autoload +(defun which-key-dump-bindings (prefix buffer-name) + "Dump bindings from PREFIX into buffer named BUFFER-NAME. + +PREFIX should be a string suitable for `kbd'." + (interactive "sPrefix: \nB") + (let* ((buffer (get-buffer-create buffer-name)) + (keys (which-key--get-bindings (kbd prefix)))) + (with-current-buffer buffer + (point-max) + (save-excursion + (dolist (key keys) + (insert (apply #'format "%s%s%s\n" key))))) + (switch-to-buffer-other-window buffer))) + ;;;###autoload (defun which-key-undo-key (&optional _) "Undo last keypress and force which-key update." -- 2.30.2